home *** CD-ROM | disk | FTP | other *** search
- object registra: Tregistra
- Left = 319
- Top = 256
- BorderIcons = []
- BorderStyle = bsDialog
- ClientHeight = 227
- ClientWidth = 433
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- Position = poScreenCenter
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 16
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 433
- Height = 227
- Align = alClient
- BevelInner = bvLowered
- TabOrder = 0
- object Label2: TLabel
- Left = 12
- Top = 60
- Width = 61
- Height = 16
- Caption = 'Title Book'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label1: TLabel
- Left = 12
- Top = 10
- Width = 37
- Height = 16
- Caption = 'Name'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object informa: TLabel
- Left = 2
- Top = 209
- Width = 429
- Height = 16
- Align = alBottom
- Alignment = taCenter
- end
- object Label3: TLabel
- Left = 12
- Top = 126
- Width = 118
- Height = 16
- AutoSize = False
- Caption = 'Registration code:'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object nombre: TEdit
- Left = 12
- Top = 28
- Width = 401
- Height = 24
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 80
- ParentFont = False
- TabOrder = 0
- end
- object empresa: TEdit
- Left = 12
- Top = 78
- Width = 401
- Height = 24
- Enabled = False
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 80
- ParentFont = False
- TabOrder = 1
- end
- object registro: TEdit
- Left = 135
- Top = 122
- Width = 192
- Height = 24
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 12
- ParentFont = False
- TabOrder = 2
- end
- object POK: TButton
- Left = 150
- Top = 176
- Width = 64
- Height = 23
- Caption = 'OK'
- Default = True
- TabOrder = 3
- OnClick = aceptaClick
- end
- object PCancel: TButton
- Left = 248
- Top = 174
- Width = 64
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 4
- OnClick = PCancelClick
- end
- end
- object Timer1: TTimer
- Interval = 500
- OnTimer = Timer1Timer
- Left = 370
- Top = 131
- end
- end
-